Những câu hỏi liên quan
Hồ Lê Thiên Đức
Xem chi tiết
Đào Tùng Dương
17 tháng 2 2022 lúc 23:45

undefined

Bình luận (1)
Phan Minh Huy
Xem chi tiết
Nguyễn Hiếu Minh
Xem chi tiết
khai nguyen
Xem chi tiết
Nguyễn Lê Phước Thịnh
24 tháng 12 2021 lúc 0:49

#include <bits/stdc++.h>

using namespace std;

long long n,i,a[1000];

int main()

{

cin>>n;

for (i=1; i<=n; i++) cin>>a[i];

sort(a+1,a+n+1);

for (i=1; i<=n; i++) cout<<a[i]<<" ";

return 0;

}

Bình luận (0)
Trâm Lê
Xem chi tiết
Nguyễn Lê Phước Thịnh
20 tháng 2 2021 lúc 13:00

const fi='xsum1.inp'     

fo='xsum1.out'

var f1,f2:text;   

a:array[1..20000]of integer;   

i,n,j,x,dem,k,m,t:integer;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,n,x);

for i:=1 to n do 

read(f1,a[i]);

dem:=0;

for i:=1 to n do 

for j:=1 to n do   

begin       

for k:=1 to n do         

if (i<j) and (j<k) then               

begin                 

t:=0;                 

for m:=i to k do                   

t:=t+a[m];                 

if t=x then inc(dem);               

end;   

end;

for i:=1 to n do 

if x=a[i] then inc(dem);

writeln(f2,dem);

close(f1);

close(f2);

end.

Bình luận (0)
Nguyễn Thái Hưng
30 tháng 6 2021 lúc 11:55

program COST;

var n,m,s,dem:int64;a:

array[1..1000000] of int64;

i,j:longint;

begin 

readln(n,m);

for i := 1 to n do read(a[i]);

dem := 0;

for i := 1 to n do

begin

s := 0;

for j := i to n do 

begin 

s := s+a[j];

if s <= m then 

begin 

inc(dem);

continue;

end

else if a[j] > m then break;

end;

end;

write(dem);

end.    

Bình luận (0)
Du Ng
Xem chi tiết
Nguyễn Lê Phước Thịnh
27 tháng 12 2021 lúc 22:47

#include <bits/stdc++.h>

using namespace std;

long long x,n,i,dem;

int main()

{

cin>>n;

dem=0;

for (i=1; i<=n; i++)

{

cin>>x;

if (x>0) dem++;

}

cout<<dem;

return 0;

}

Bình luận (1)
Phạm An Khánh
Xem chi tiết
Phạm An Khánh
23 tháng 3 2021 lúc 21:10

đây là pascal ạ

Bình luận (0)
Nguyễn Lê Phước Thịnh
24 tháng 3 2021 lúc 20:20

uses crt;

var a:array[1..1000]of integer;

i,n,j,tam,t,t1,tam,dem,max:integer;

begin

clrscr;

n:=0;

t:=0;

repeat

inc(n);

write('A[',n,']='); readln(a[n]);

t:=t+a[n];

until t>100;

for i:=1 to n-1 do 

  for j:=i+1 to n do 

if a[i]>a[j] then 

begin

tam:=a[i];

a[i]:=a[j];

a[j]:=tam;

end;

writeln('Day so theo chieu tang dan la: ');

for i:=1 to n do 

 write(a[i]:4);

writeln;

t1:=0;

dem:=0;

for i:=1 to n do 

if a[i] mod 3=0 then

begin

t1:=t1+a[i];

inc(dem);

end;

max:=a[1];

for i:=1 to n do 

  if max<a[i] then max:=a[i];

writeln('Tong cac so la boi cua 3 la: ',t1);

writeln('So lon nhat cua day la: ',max);

writeln('So luong so la boi cua 3 la: ',dem);

readln;

end.

Bình luận (0)
Du Ng
Xem chi tiết
Phương Nguyễn
Xem chi tiết
Hoang Phuc
5 tháng 3 2023 lúc 9:50

#include <iostream>
using namespace std;

int main() 

{

         int N, sum = 0, num;

         float average;

         cout << "Nhap so phan tu cua day: ";

         cin >> N;

        // Vòng lặp để nhập dữ liệu cho các phần tử trong dãy

       for (int i = 0; i < N; i++) {

              cout << "Nhap phan tu thu " << i+1 << ": ";

              cin >> num;

              sum += num; // tính tổng của dãy

}

// tính trung bình cộng của dãy

average = (float) sum / N;

cout << "Trung binh cong cua day la: " << average;

return 0;

}

  
Bình luận (0)